home *** CD-ROM | disk | FTP | other *** search
/ Deep Throat Girls 5 / Deep Throat Girls 5.iso / mac / MAC.Dir / 00029_splash.ls < prev    next >
Encoding:
Text File  |  1997-02-09  |  514 b   |  23 lines

  1. on exitFrame
  2.   global level, alienblow, men, repeet, direct
  3.   when keyDown then nothing
  4.   if repeet = 0 then
  5.     set alienblow to []
  6.     repeat with q = 1 to 33
  7.       addAt(alienblow, q, 6)
  8.     end repeat
  9.     set level to 1
  10.     set men to 3
  11.     set repeet to 1
  12.     set direct to 1
  13.   end if
  14.   if soundBusy(1) = 0 then
  15.     puppetSound(1, "DTGTHEME.AIF")
  16.     updateStage()
  17.     set the timeoutScript to "showpicts"
  18.     set the timeoutLength to 5 * 60
  19.     set the cursor of sprite 7 to 200
  20.   end if
  21.   go(the frame)
  22. end
  23.